www.gusucode.com > 落叶冰点万能企业网站内容管理系统 V9.1 > 落叶冰点万能企业网站内容管理系统 V9.1\code\Label\custom_Label\图片视频音乐系统标签库\nd_tj_picsp_pic.asp

    <%'$start_ext_newDsoft 以下系统生成,勿删!
'$newDsoft_label_type$:loop_label_two_loop$end_newDsoft_label_type$
'$newDsoft_label_name$:tj_picsp_pic$end_newDsoft_label_name$
'$newDsoft_label_sql$:select [ND_pic_or_sp].id,[ND_pic_or_sp].sys_content_type,[ND_pic_or_sp].title,[ND_pic_or_sp].classid,[ND_pic_or_sp].SpecialID,[ND_pic_or_sp].titleColor,[ND_pic_or_sp].titleFont,[ND_pic_or_sp].index_page_pic,[ND_pic_or_sp].content,[ND_pic_or_sp].is_outlink,[ND_pic_or_sp].outlink,[ND_pic_or_sp].Author_nick,[ND_pic_or_sp].is_new,[ND_pic_or_sp].is_tuijian,[ND_pic_or_sp].isTop,[ND_pic_or_sp].Hits,[ND_pic_or_sp].DayHits,[ND_pic_or_sp].MonthHits,[ND_pic_or_sp].HitsTime,[ND_pic_or_sp].WriteTime,[ND_pic_or_sp].username,[ND_pic_or_sp].out_and_inner_img_list,[ND_pic_or_sp].UploadImage_list,[ND_pic_or_sp].Uploadfile_list,[ND_pic_or_sp].is_shenhe,[ND_pic_or_sp].is_can_pinlun,[nd_pic_or_sp].xiangguan_keywords_list,[ND_pic_or_sp].liulang_dengji_group_id,[ND_pic_or_sp].dianshuo_to_look from [ND_pic_or_sp]$end_newDsoft_label_sql$
'$newDsoft_label_params$:sys_content_type,频道id,1|num,显示数,3|colnum,显示列数,3|lent,标题最大字符长度,3|pwidth,图片显示宽度,3|pheight,图片显示高度,3|url,图片或音视频 详细页url,2|classyn,是否指定类别，1=是,3|classid,可以为空，指定类别,3|width,显示宽度,3$end_newDsoft_label_params$
'$newDsoft_label_fenye_num$:$xxvar$num$end_newDsoft_label_fenye_num$
'$newDsoft_label_beizhu$:显示 推荐的含图片的  图片或音视频 的图文列表,按点击排序$end_newDsoft_label_beizhu$
'$newDsoft_is_sys_label$:0$end_newDsoft_is_sys_label$
'$newDsoft_other_params$:hhend:</table>|hhks:<table   border="0" cellpadding="0" cellspacing="0" width="$xxvar$width">$$sx_aspcodex_huanhang${$$include_get_art_type}$$sx_aspcodex_huanhang${$$include_get_font_str}|sql_run:$$sx_aspcodex_startx1$$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$if trim(cstr("$xxvar$classid"&" "))="" or (not isnumeric($xxvar$classid)) or $xxvar$classyn<>1 then$$sx_aspcodex_huanhang$lllssssss=""$$sx_aspcodex_huanhang$else$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$biao="[ND_pic_or_sp_class]"$$sx_aspcodex_huanhang$set Rs33=server.CreateObject("adodb.recordset")$$sx_aspcodex_huanhang$sql="select cstr(parent_id_list) from "&biao&" where id="&request("classid")$$sx_aspcodex_huanhang$Rs33.open sql,newdsoft_conn_obj,1,1$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$sspa=rs33(0)&","&"$xxvar$classid"&","$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$lllssssss=" and (classid='$xxvar$classid' or classid in (select cstr(id) from "&biao&" where parent_id_list like '%"&sspa&"%' ) or classid in (select cstr(id) from "&biao&" where  parent_id='$xxvar$classid') ) "$$sx_aspcodex_huanhang$end if$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$sql=" select * from   [ND_pic_or_sp] where  sys_content_type='"&$xxvar$sys_content_type&"' and  is_tuijian='1' and (Uploadfile_list<>'' or index_page_pic<>'')  and is_shenhe='1' "&lllssssss&" order by  Hits desc,WriteTime desc,len(index_page_pic&' ') desc,id desc"$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$$$sx_aspcodex_endx1$|iffen:0|di2xh_num:$xxvar$colnum|run_asp1:|run_asp2:$$sx_aspcodex_startx1$$$sx_aspcodex_huanhang$if rs_x1("index_page_pic")<>"" then$$sx_aspcodex_huanhang$picuuuel=rs_x1("index_page_pic")$$sx_aspcodex_huanhang$else$$sx_aspcodex_huanhang$picuuuel=split(rs_x1("Uploadfile_list"),"$$sx_fengex1$")(0)$$sx_aspcodex_huanhang$end if$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$set Rs3311=server.CreateObject("adodb.recordset")$$sx_aspcodex_huanhang$sql="select * from [ND_pic_or_sp_class] where id="&rs_x1("classid")&""$$sx_aspcodex_huanhang$Rs3311.open sql,newdsoft_conn_obj,1,1$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$clssstr=""$$sx_aspcodex_huanhang$$$sx_aspcodex_endx1$$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$$$sx_aspcodex_startx1$$$sx_aspcodex_huanhang$'获取字体的html$$sx_aspcodex_huanhang$nd_ret_font=left(rs_x1("title"),$xxvar$lent)$$sx_aspcodex_endx1$$$sx_aspcodex_huanhang$$$sx_aspcodex_startx1$$$sx_aspcodex_huanhang$if rs_x1("is_outlink")="1" then$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$suuurl=rs_x1("outlink")$$sx_aspcodex_huanhang$else$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$suuurl="$xxvar$url?arid="&rs_x1("id")&"&cid="&rs_x1("classid")$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$end if$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$if rs_x1("istop")="1" then $$sx_aspcodex_huanhang$dcdcds="<font color=#ff0000>[顶]</font>"$$sx_aspcodex_huanhang$else$$sx_aspcodex_huanhang$dcdcds=""$$sx_aspcodex_huanhang$end if$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$$$sx_aspcodex_endx1$|yi_ksdaima2:<tr>|ksdaima2:$$sx_aspcodex_startx1$$$sx_aspcodex_huanhang$if $xxvar$colnum<>0 then$$sx_aspcodex_huanhang$clbfbb=100/$xxvar$colnum$$sx_aspcodex_huanhang$end if$$sx_aspcodex_huanhang$$$sx_aspcodex_endx1$$$sx_aspcodex_huanhang$<td width="$$sx_aspcodex_startx1$=clbfbb$$sx_aspcodex_endx1$%">|jiesdaima2:</td>|yi_jiesdaima22:</tr>|rsname:rs_x1|htmledxa:1|htmledxb:$end_newDsoft_other_params$
'$end_ext_newDsoft%>



<table cellspacing="0" cellpadding="0" border="0">
    <tbody>
        <tr>
            <td><a target="_blank" href="<%=suuurl%>"><img height="$xxvar$pheight" alt="<%=rs_x1("title")%>" width="$xxvar$pwidth" border="0" src="<%=picuuuel%>" /> </a></td>
        </tr>
        <tr>
            <td><a target="_blank" href="<%=suuurl%>"><%=nd_ret_font%></a></td>
        </tr>
    </tbody>
</table>